Шаг 55 - Свойство CollatingOrder.

Описание
Возвращает значение, указывающее порядок символов, используемый при сравнении текстовых строк или при определении порядка сортировки (только в рабочей области Microsoft Jet).

Значение
Возвращаемое значение является значением типа Long или одной из следующих констант.

dbSortGeneral			Общий порядок символов (английский, французский, немецкий, португальский, 
				итальянский и современный испанский)
dbSortArabic			Арабский 
dbSortChineseSimplified		Упрощенный китайский 
dbSortChineseTraditional		Традиционный китайский 
dbSortCyrillic			Русский 
dbSortCzech			Чешский 
dbSortDutch			Голландский 
dbSortGreek			Греческий 
dbSortHebrew			Иврит 
dbSortHungarian			Венгерский 
dbSortIcelandic			Исландский 
dbSortJapanese			Японский 
dbSortKorean			Корейский 
dbSortNeutral			Нейтральный (независимый от языка)
dbSortNorwDan			Норвежский или датский
dbSortPDXIntl			Международный набор символов Paradox
dbSortPDXNor			Норвежский или датский набор символов Paradox
dbSortPDXSwe			Шведский или финский набор символов Paradox
dbSortPolish			Польский 
dbSortSlovenian			Словенский
dbSortSpanish			Испанский
dbSortSwedFin			Шведский или финский
dbSortThai			Тайский 
dbSortTurkish			Турецкий 
dbSortUndefined			Порядок символов не определен или неизвестен.

Замечания
Использование свойства CollatingOrder зависит от того, какой из объектов содержит семейство Fields, как показано в следующей таблице.

Index		Не поддерживается
QueryDef		Только чтение
Recordset		Только чтение
Relation		Не поддерживается
TableDef		Только чтение

Значение свойства CollatingOrder совпадает со значением аргумента порядок, которое было указано в методе CreateDatabase при создании базы данных или в методе CompactDatabase при последнем сжатии базы данных.
Значение свойства CollatingOrder объектов Database или Field проверяют для определения метода сравнения строк, указанного для базы данных или для отдельного поля. С помощью свойства CollatingOrder нового, еще не добавленного в семейство объекта Field можно указать использование в поле порядка символов, отличного от общего порядка символов, использующегося во вмещающем данное поле объекте Database.
Значения свойств CollatingOrder и Attributes объекта Field, входящего в семейство Fields объекта Index, определяют порядок символов при сравнении строк и порядок сортировки в индексе. Однако невозможно указать особый порядок для отдельного индекса. Порядок задается сразу для всей таблицы.

Пример
Следующая программа отображает свойство CollatingOrder для базы данных "Борей" и для отдельных полей в таблице.

Sub CollatingOrderX()

	Dim dbsNorthwind As Database
	Dim fldLoop As Field

	Set dbsNorthwind = OpenDatabase("Борей.mdb")

	With dbsNorthwind
		' Отображает языковую настройку базы данных "Борей".
		Debug.Print "Языковая настройка " & .Name & " = " & .CollatingOrder

		' Отображает языковую настройку для полей объекта TableDef.
		Debug.Print "Языковая настройка полей таблицы " & .TableDefs(0).Name 
		For Each fldLoop In .TableDefs(0).Fields
			Debug.Print "    " & fldLoop.Name & " = " &  fldLoop.CollatingOrder
		Next fldLoop
		.Close
	End With

End Sub
Hosted by uCoz